home *** CD-ROM | disk | FTP | other *** search
- object PageOptionsForm: TPageOptionsForm
- Left = 129
- Top = 183
- BorderStyle = bsDialog
- Caption = 'Printed Page Options'
- ClientHeight = 316
- ClientWidth = 418
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 418
- Height = 276
- ActivePage = TabSheet1
- Align = alClient
- TabIndex = 0
- TabOrder = 0
- object TabSheet1: TTabSheet
- Caption = 'Page && Headers'
- object GroupBox1: TGroupBox
- Left = 9
- Top = 9
- Width = 169
- Height = 84
- Caption = 'Printer Settings'
- TabOrder = 0
- object Label25: TLabel
- Left = 22
- Top = 22
- Width = 124
- Height = 13
- Caption = 'Paper size and Orientation'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object PrinterSettingsButton: TButton
- Left = 20
- Top = 44
- Width = 128
- Height = 25
- Caption = 'Printer Settings...'
- TabOrder = 0
- OnClick = PrinterSettingsButtonClick
- end
- end
- object MarginGroupBox: TGroupBox
- Left = 185
- Top = 9
- Width = 215
- Height = 84
- Caption = 'Margins (Inches)'
- TabOrder = 1
- object Label7: TLabel
- Left = 111
- Top = 26
- Width = 28
- Height = 13
- Caption = '&Right:'
- end
- object Label26: TLabel
- Left = 111
- Top = 56
- Width = 36
- Height = 13
- Caption = '&Bottom:'
- end
- object Label27: TLabel
- Left = 15
- Top = 26
- Width = 21
- Height = 13
- Caption = '&Left:'
- end
- object Label28: TLabel
- Left = 14
- Top = 56
- Width = 22
- Height = 13
- Caption = '&Top:'
- end
- object LeftEdit: TEdit
- Left = 44
- Top = 23
- Width = 49
- Height = 21
- TabOrder = 0
- Text = '1"'
- OnExit = MarginEditExit
- OnKeyPress = MarginEditKeyPress
- end
- object RightEdit: TEdit
- Left = 152
- Top = 23
- Width = 49
- Height = 21
- TabOrder = 1
- Text = '1"'
- OnExit = MarginEditExit
- OnKeyPress = MarginEditKeyPress
- end
- object TopEdit: TEdit
- Left = 44
- Top = 54
- Width = 49
- Height = 21
- TabOrder = 2
- Text = '1"'
- OnExit = MarginEditExit
- OnKeyPress = MarginEditKeyPress
- end
- object BottomEdit: TEdit
- Left = 152
- Top = 54
- Width = 49
- Height = 21
- TabOrder = 3
- Text = '1"'
- OnExit = MarginEditExit
- OnKeyPress = MarginEditKeyPress
- end
- end
- object GroupBox3: TGroupBox
- Left = 9
- Top = 98
- Width = 392
- Height = 138
- Caption = 'Headers && Footers'
- TabOrder = 2
- object Label1: TLabel
- Left = 16
- Top = 24
- Width = 59
- Height = 13
- Caption = 'Header Left:'
- end
- object Label2: TLabel
- Left = 140
- Top = 24
- Width = 81
- Height = 13
- Caption = 'Header Centered'
- end
- object Label3: TLabel
- Left = 262
- Top = 24
- Width = 66
- Height = 13
- Caption = 'Header Right:'
- end
- object Label4: TLabel
- Left = 16
- Top = 69
- Width = 54
- Height = 13
- Caption = 'Footer Left:'
- end
- object Label29: TLabel
- Left = 140
- Top = 69
- Width = 79
- Height = 13
- Caption = 'Footer Centered:'
- end
- object Label30: TLabel
- Left = 261
- Top = 69
- Width = 61
- Height = 13
- Caption = 'Footer Right:'
- end
- object Label31: TLabel
- Left = 54
- Top = 120
- Width = 281
- Height = 13
- Caption =
- 'Right click these fields to insert defined tags (i.e. {datetime}' +
- ')'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlue
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object HeaderLeftEdit: TEdit
- Tag = 1
- Left = 15
- Top = 40
- Width = 114
- Height = 21
- PopupMenu = TagPopupMenu
- TabOrder = 0
- end
- object HeaderCenterEdit: TEdit
- Tag = 1
- Left = 139
- Top = 40
- Width = 114
- Height = 21
- PopupMenu = TagPopupMenu
- TabOrder = 1
- end
- object HeaderRightEdit: TEdit
- Tag = 1
- Left = 261
- Top = 40
- Width = 114
- Height = 21
- PopupMenu = TagPopupMenu
- TabOrder = 2
- end
- object FooterLeftEdit: TEdit
- Tag = 1
- Left = 15
- Top = 87
- Width = 114
- Height = 21
- PopupMenu = TagPopupMenu
- TabOrder = 3
- end
- object FooterCenterEdit: TEdit
- Tag = 1
- Left = 138
- Top = 87
- Width = 114
- Height = 21
- PopupMenu = TagPopupMenu
- TabOrder = 4
- end
- object FooterRightEdit: TEdit
- Tag = 1
- Left = 261
- Top = 87
- Width = 114
- Height = 21
- PopupMenu = TagPopupMenu
- TabOrder = 5
- end
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'SQL && Spreadsheet Print Options'
- ImageIndex = 1
- object GroupBox2: TGroupBox
- Left = 9
- Top = 5
- Width = 391
- Height = 79
- Caption = 'Code Print Options'
- TabOrder = 0
- object PrintPlainText: TCheckBox
- Tag = 1
- Left = 21
- Top = 23
- Width = 301
- Height = 17
- Caption = 'Print as plain text (not syntax highlighted)'
- TabOrder = 0
- end
- object PrintLineNumbersCheckbox: TCheckBox
- Tag = 1
- Left = 21
- Top = 48
- Width = 140
- Height = 17
- Caption = 'Print line numbers'
- TabOrder = 1
- end
- end
- object GroupBox4: TGroupBox
- Left = 9
- Top = 89
- Width = 392
- Height = 149
- Caption = 'Spreadsheet'
- TabOrder = 1
- object Label5: TLabel
- Left = 25
- Top = 25
- Width = 29
- Height = 14
- AutoSize = False
- Caption = 'Title:'
- end
- object Bevel1: TBevel
- Left = 55
- Top = 80
- Width = 316
- Height = 10
- Shape = bsTopLine
- end
- object ShowTitle: TCheckBox
- Tag = 1
- Left = 57
- Top = 53
- Width = 174
- Height = 14
- Hint = 'The horizontal line under the field names.'
- Caption = 'Show Title'
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- object HeaderLine: TCheckBox
- Tag = 1
- Left = 57
- Top = 92
- Width = 102
- Height = 14
- Hint = 'The horizontal line under the field names.'
- Caption = 'Header Line'
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- object RecordLines: TCheckBox
- Tag = 1
- Left = 56
- Top = 113
- Width = 106
- Height = 14
- Hint = 'The horizontal line under each record.'
- Caption = 'Record Lines'
- Checked = True
- State = cbChecked
- TabOrder = 3
- end
- object ColumnLines: TCheckBox
- Tag = 1
- Left = 170
- Top = 92
- Width = 96
- Height = 14
- Hint = 'The vertical lines between each column.'
- Caption = 'Column Lines'
- Checked = True
- State = cbChecked
- TabOrder = 4
- end
- object LastColumnLine: TCheckBox
- Tag = 1
- Left = 171
- Top = 113
- Width = 111
- Height = 14
- Hint = 'The vertical line at the right of the last column.'
- Caption = 'Last Column Line'
- Checked = True
- State = cbChecked
- TabOrder = 5
- end
- object SpreadsheetTitleEdit: TEdit
- Left = 57
- Top = 22
- Width = 308
- Height = 21
- AutoSize = False
- TabOrder = 0
- end
- end
- end
- end
- object Panel1: TPanel
- Left = 0
- Top = 276
- Width = 418
- Height = 40
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 1
- object OkButton: TButton
- Left = 8
- Top = 9
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- end
- object CancelButton: TButton
- Left = 96
- Top = 9
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object SaveAsDefaultsButton: TButton
- Left = 282
- Top = 9
- Width = 128
- Height = 25
- Caption = 'Save as Defaults'
- ModalResult = 1
- TabOrder = 2
- OnClick = SaveAsDefaultsButton1Click
- end
- end
- object TagPopupMenu: TPopupMenu
- AutoHotkeys = maManual
- AutoLineReduction = maManual
- Left = 347
- Top = 11
- object tabname1: TMenuItem
- Caption = '{title}'
- OnClick = TagMenuClick
- end
- object Title1: TMenuItem
- Caption = '{account}'
- OnClick = TagMenuClick
- end
- object tabname2: TMenuItem
- Caption = '{title} - {account}'
- OnClick = TagMenuClick
- end
- object PageCurrentPageofTotalPages1: TMenuItem
- Caption = 'Page {page} of {totalpages}'
- OnClick = TagMenuClick
- end
- object CurrentPage1: TMenuItem
- Caption = '{page}'
- OnClick = TagMenuClick
- end
- object TotalPages1: TMenuItem
- Caption = '{totalpages}'
- OnClick = TagMenuClick
- end
- object DateTime1: TMenuItem
- Caption = '{datetime}'
- OnClick = TagMenuClick
- end
- object Date1: TMenuItem
- Caption = '{date}'
- OnClick = TagMenuClick
- end
- object Time1: TMenuItem
- Caption = '{time}'
- OnClick = TagMenuClick
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Clearfield1: TMenuItem
- Caption = 'Clear field'
- OnClick = Clearfield1Click
- end
- end
- object PrinterSetupDialog1: TPrinterSetupDialog
- Left = 313
- Top = 11
- end
- end
-